home *** CD-ROM | disk | FTP | other *** search
- 120 PRINT CHR$(147);:T=20
- 130 POKE 53280,6
- 140 PRINT"HOW TO LOAD[146] LOAD "CHR$(34)"MONITOR"CHR$(34)",8,1 RETURN"
- 150 PRINT"HOW TO RUN [146] NEW:SYS 49152 RETURN"
- 160 PRINT"--------------------------------------"
- 170 PRINT".A[146] LDA #$00 [:]"TAB(T)"SIMPLE ASSEMBLER"
- 180 PRINT".B[146] 1000"TAB(T)"ENTER BREAKPOINTS"
- 190 PRINT".C[146] 1000 2000 3000"TAB(T)"COMPARE RANGE"
- 200 PRINT".D[146] 1000 [2000]"TAB(T)"DISASSEMBLE"
- 210 PRINT".E[146]"TAB(T)"EXIT TO BASIC"
- 220 PRINT".F[146] 1000 2000 FF"TAB(T)"FILL RANGE WITH BYTE";
- 230 PRINT".G[146] [1000] GO TO P.C. OR ADDR"
- 240 PRINT".H[146] 1000 2000 'Q"TAB(T)"HUNT RANGE FOR BYTE"
- 250 PRINT".J[146] [1000] "TAB(T)"JUMP TO AND RETURN"
- 260 PRINT".L[146] 1000 "CHR$(34)"*"CHR$(34)" 08"TAB(T)"LOAD PROGRAM"
- 270 PRINT".M[146] 1000 [2000]"TAB(T)"DISPLAY BYTES"
- 280 PRINT".N[146] 1000 2000 0100"TAB(T)"NEW LOCATOR"
- 290 PRINT" 4000 5000 [W]"TAB(T)"RANGE-OFFSET-RANGE"
- 300 PRINT".O[146] O33A 033F"TAB(T)"CALCULATE BRANCH"
- 310 PRINT".Q[146] [1000]"TAB(T)"QUICK TRACE"
- 320 PRINT".R[146]"TAB(T)"DISPLAY REGISTERS"
- 330 PRINT".S[146] 1000 2000 "CHR$(34)"*"CHR$(34)" 08"TAB(T)"SAVE PROGRAM FROM-TO";
- 340 PRINT".T[146] 1000 2000 3000 TRANSFER RANGE"
- 350 PRINT".V[146] 1000 "CHR$(34)"*"CHR$(34)" 08"TAB(T)"VERIFY PROGRAM"
- 360 PRINT".W[146] [1000] "TAB(T)"WALK THROUGH CODE"
- 370 PRINT".X[146]"TAB(T)"EXIT TO BASIC"
- 380 IFX=0THEN400
- 390 PRINT" PRESS ANY KEY TO CONTINUE[146]";:X=0:GOTO410
- 400 PRINT" PRESS ANY KEY TO CONTINUE";:X=1
- 410 GETA$:IFA$<>""THEN430
- 420 FORTT=1TO200:NEXT:GOTO380
- 430 PRINT"[147]"
- 440 PRINT" ADDITIONAL COMMANDS"
- 450 PRINT"--------------------------------------"
- 460 PRINT".$[146] FFFF"TAB(T)"HEX CONVERSION"
- 470 PRINT".#[146] 5555"TAB(T)"DECIMAL CONVERSION"
- 480 PRINT".%[146] 10100100010111"TAB(T)"BINARY CONVERSION"
- 490 PRINT".";CHR$(34);:POKE212,0:PRINT"[146] A "TAB(T)"ASCII CONVERSION"
- 500 PRINT".+[146] 1111 FFFF"TAB(T)"HEX ADDITION"
- 510 PRINT".-[146] FFFF 2222"TAB(T)"HEX SUBTRACTION"
- 520 PRINT".&[146] A000 AFFF"TAB(T)"CALCULATE CHECKSUM"
- 530 PRINT".>[146]"TAB(T)"DISPLAY DIRECTORY"
- 540 PRINT".([146]"TAB(T)"ENABLE COMMAND TONES";
- 550 PRINT".)[146] DISABLE TONES"
- 560 WAIT197,64,64
- 570 POKE53280,14:PRINT"[147]"
-